inherited FCadastroOcorrencia: TFCadastroOcorrencia
  Caption = 'FCadastroOcorrencia'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 16
  object Label1: TLabel [0]
    Left = 120
    Top = 8
    Width = 38
    Height = 16
    Caption = 'Label1'
  end
  inherited pcCadastro: TPageControl
    inherited TsPesquisa: TTabSheet
      inherited dbgPesquisaPadra: TDBGrid
        Columns = <
          item
            Expanded = False
            FieldName = 'PFO_CODIGO_OCORRENCIA'
            Title.Caption = 'C'#243'digo'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PFO_NIVEL'
            Title.Caption = 'Nivel'
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PFO_MENSAGEM'
            Title.Caption = 'Mensagem'
            Width = 453
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'PFO_REGISTRO'
            Title.Caption = 'Registro'
            Visible = True
          end>
      end
    end
    inherited TsCadastro: TTabSheet
      inherited panel1: TPanel
        object Label2: TLabel [0]
          Left = 20
          Top = 48
          Width = 40
          Height = 16
          Caption = 'C'#243'digo'
        end
        object Label3: TLabel [1]
          Left = 83
          Top = 48
          Width = 27
          Height = 16
          Caption = 'Nivel'
        end
        object Label4: TLabel [2]
          Left = 19
          Top = 94
          Width = 64
          Height = 16
          Caption = 'Mensagem'
        end
        object Label5: TLabel [3]
          Left = 20
          Top = 142
          Width = 48
          Height = 16
          Caption = 'Registro'
        end
        object Label6: TLabel [4]
          Left = 121
          Top = 47
          Width = 288
          Height = 48
          Caption = 
            '1 - INCONSIST'#202'NCIA, INVALIDA O ARQUIVO'#13#10'2 - INCONSIST'#202'NCIA, INVA' +
            'LIDA O REGISTRO'#13#10'3 - CONSIST'#202'NCIA A TAREFA FOI EXECUTADA'
        end
        object Label7: TLabel [5]
          Left = 76
          Top = 141
          Width = 99
          Height = 48
          Caption = '0 - HEADER'#13#10'1 - TRANSA'#199#195'O'#13#10'9 - TRAILLER'
        end
        inherited panel2: TPanel
          inherited DBNavigator1: TDBNavigator
            Hints.Strings = ()
          end
        end
        object DBEdit2: TDBEdit
          Left = 20
          Top = 65
          Width = 36
          Height = 22
          CharCase = ecUpperCase
          Ctl3D = False
          DataField = 'PFO_CODIGO_OCORRENCIA'
          DataSource = dsCadastro
          ParentCtl3D = False
          TabOrder = 2
        end
        object DBEdit3: TDBEdit
          Left = 83
          Top = 65
          Width = 26
          Height = 22
          CharCase = ecUpperCase
          Ctl3D = False
          DataField = 'PFO_NIVEL'
          DataSource = dsCadastro
          ParentCtl3D = False
          TabOrder = 3
        end
        object DBEdit4: TDBEdit
          Left = 19
          Top = 111
          Width = 645
          Height = 22
          CharCase = ecUpperCase
          Ctl3D = False
          DataField = 'PFO_MENSAGEM'
          DataSource = dsCadastro
          ParentCtl3D = False
          TabOrder = 4
        end
        object DBEdit5: TDBEdit
          Left = 19
          Top = 158
          Width = 31
          Height = 22
          CharCase = ecUpperCase
          Ctl3D = False
          DataField = 'PFO_REGISTRO'
          DataSource = dsCadastro
          ParentCtl3D = False
          TabOrder = 5
          OnExit = DBEdit5Exit
        end
      end
    end
  end
  inherited PopupMenu1: TPopupMenu
    Left = 664
  end
  inherited dsCadastro: TDataSource
    Left = 648
    Top = 320
  end
  inherited QCadastro: TQuery
    SQL.Strings = (
      
        'SELECT * FROM PAGFOR_OCORRENCIA  order by pagfor_ocorrencia.pfo_' +
        'codigo_ocorrencia')
    Left = 544
    Top = 272
  end
  inherited dspCadastro: TDataSetProvider
    Left = 464
    Top = 360
  end
  inherited cdsCadastro: TClientDataSet
    Left = 336
    Top = 224
    object cdsCadastroPFO_CODIGO: TIntegerField
      FieldName = 'PFO_CODIGO'
    end
    object cdsCadastroPFO_CODIGO_OCORRENCIA: TStringField
      Alignment = taCenter
      FieldName = 'PFO_CODIGO_OCORRENCIA'
      Size = 2
    end
    object cdsCadastroPFO_NIVEL: TStringField
      Alignment = taCenter
      FieldName = 'PFO_NIVEL'
      FixedChar = True
      Size = 1
    end
    object cdsCadastroPFO_MENSAGEM: TStringField
      FieldName = 'PFO_MENSAGEM'
      Size = 80
    end
    object cdsCadastroPFO_REGISTRO: TStringField
      Alignment = taCenter
      FieldName = 'PFO_REGISTRO'
      FixedChar = True
      Size = 1
    end
    object cdsCadastroUSUARIO_CADASTRO: TStringField
      FieldName = 'USUARIO_CADASTRO'
    end
    object cdsCadastroUSUARIO_AUTERACAO: TStringField
      FieldName = 'USUARIO_AUTERACAO'
    end
    object cdsCadastroUSUARIO_EXCLUSAO: TStringField
      FieldName = 'USUARIO_EXCLUSAO'
    end
    object cdsCadastroDATA_CADASTRO: TDateTimeField
      FieldName = 'DATA_CADASTRO'
    end
    object cdsCadastroDATA_AUTERACAO: TDateTimeField
      FieldName = 'DATA_AUTERACAO'
    end
    object cdsCadastroDATA_EXCLUSAO: TDateTimeField
      FieldName = 'DATA_EXCLUSAO'
    end
    object cdsCadastroCODIGOEMPRESA: TIntegerField
      FieldName = 'CODIGOEMPRESA'
    end
    object cdsCadastroEXCLUIDO: TStringField
      FieldName = 'EXCLUIDO'
      FixedChar = True
      Size = 1
    end
  end
  inherited dsCamposPesquisa: TDataSource
    Left = 448
    Top = 256
  end
  inherited OpenDialog1: TOpenDialog
    Left = 600
    Top = 264
  end
  object Table1: TTable
    Active = True
    DatabaseName = 'base'
    TableName = 'PAGFOR_OCORRENCIA'
    Left = 152
    Top = 224
  end
end
